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From  the  Desk  of  Bill  Johnson 


The  WINTER  1987  issue  which  will  be  published  in  the  early  part  of 
January  1987  will  be  our  last  issue*  Due  to  a large  increase  in  my 
business*  WMJ  Data  Systems,  I will  not  have  the  time  needed  to  keep 
publishing  QuarTerS* 

I had  many  plans  for  QuarTerS,  as  discussed  in  the  Summer  1986 
issue,  including  an  extra  issue  and  a Best  of  QuarTerS*  The  extra 
business  has  come  from  my  jump  into  the  Apple,  Atari,  Commodore, 
IBM*,, lines  of  computers.  Currently  I need  all  of  my  time  just  to 
handle  the  every  day  events  of  running  WMJ  Data  Systems.  My  free 
time  is  precious  to  me  as  1 am  sure  yours  is  to  you*  We  will  still 
be  handling  products  for  the  Timex/Stnclair  line  and  plan  to  for  as 
far  as  we  can  see.  Many  of  you  s.hould  have  received  our  latest 
catalog  recently,  if  not  Let  us  know* 

If  the  upper  right  hand  corner  of  your  mailing  label  says  FALL-86 
than  this  is  your  last  issue.  If  you  wish  to  receive  the  WINTER 
1987  issue  please  send  a check  or  money  order  for  $2.50  by  December 
31st  along  with  your  name  and  address. 

Since  most  of  our  subscriptions  expire  with  the  FALL  1986  or  WINTER 
1987  issues  we  will  have  fulfilled  our  obligation  to  most  of  our 
readers.  For  all  other  readers  who  have  subscriptions  that  expire 
after  the  WINTER  1987  issue  we  will  settle  with  you  at  the  time  the 
WINTER  1987  issue  is  published* 

Currently  the  largest  and  most  consistant  Timex/Sinclair  magazine  is 
TIME  DESIGNS,  29722  Hult  Rd , Colton,  OR  97017.  Time  Designs  is 
published  bi-monthLy  and  a one  year  subscription  goes  for  $15.00,  I 
recommend  this  magazine  as  it  covers  all  aspect  of  the 
Timex/Sinclair  computers* 


Until  next  time... 


OWN  ANOTHER  COMPUTER??? 
Do  you  have  an... 

APPLE 
ATARI 
COMMODORE 
IBM  PC/PCjr 
IBM  COMPATIABLE 
TIMEX/SINCLAIR 
TRS-80 


IF  YOU  OWN  ONE  OF  THE  ABOVE  COMPUTERS 
WHY  NOT  SEND  FOR  A COPY  OF  OUR  LATEST 
CATALOG,  28  PAGES  OF  DISCOUNT  SOFTWARE. 


WMJ  DATA  SYSTEMS 
4 Butterfly  Drive 
Hauppauge,  NY  11788 
(516)543-5252 


DEAR  QTS : 

You  might  like  to  know  that  I run  my 
office  on  a ZX81  computer,  and  will 
reprint  a short  article  that  was 
published  in  "M.  D+  Computing"  here: 

"DAYSHEET" 

As  512K  RAM/ 10  megabyte  disk  computer 
systems  become  more  common-place,  we 
sometimes  forget  what  can  be  done 
with  older,  more  common,  64K,  Z8G 
based  8 bit  machines,  and  effecient 
programming* 

Larry  Sheingorn,  M * D. , of  Rockville, 
Maryland,  uses  a $44*00  Sinclair  2X81 
computer  to  run  his  clinical 
ophthalmology  practice.  With 
additional  memory,  keyboard,  and  80 
column  printer,  the  system  cost 
approximately  $1,000,00,  Lack  of 
disks  prevents  large  amounts  of  data 
being  "on-line",  but  the  program  will 
soon  be  modified  to  take  advantage  of 
other,  disk  based  systems,  including 
CP/M,  Commodore,  Apple,  and  IBM 
devices.  The  cost  of  fully 
configured  systems  will  be  from  l/5th 
to  l/10th  of  those  currently  on  the 
ma  rket . 

The  program  essentially  creates  a 
file  called  "daysheet";  disk-based 
versions  will  store  multiple  files  in 
RAM  &/or  disk.  The  "day"  consists  of 
up  to  25  patient  encounters,  and  each 
encounter  can  have  up  to  five 
procedures,  A "da>  r‘  can  also  have  up 
to  25  f,RGAttfs  {received  on  accounts), 
and  daily  expenses  are  grouped  in  20 
different  categories* 

A menu  oriented  structure  allows  an 
untrained  operator  to  use  the 
computer  almost  immediately. 
Obviously,  the  user  is  completely 
unaware  oE  updating  "files", 
"records",  or  "fields",  A day'ss 
appointments  are  generally  entered 
into  the  device  at  a convenient  time, 
and  tne  day  is  "SAVE"'d  on  magnetic 
tape.  As  the  day  progresses, 
appointments  and  other  transactions 
are  made  in  real  time.  At  any  time, 
a printed  schedule,  properly  ordered, 
as  well  as  chart  forms  for  all  "new" 
patients  can  be  prepared  with 
appropriate,  single,  keystrokes. 
Insurance  ready  bills  are  generated 


with  a keystroke  for  one  or  all 
patients,  using  data  entered  during 
the  day,  without  having  to  consult 
CPT  or  1CD  code  books.  Patient 
educational  materials  are  also 
available  thru  simple  responses  to 
various  menus. 

Keep  in  touch.  Its  too  bad  the  2X81 
died! 

Sincerely, 

Larry  Sheingorn,  M.D, 

RockviLle,  MD  20850 

Dear  QTS: 

I read  with  interest  the  Summer  issue 
of  QuarTerS  and  the  letter  from  Joan 
Kealy , asking  about  the  TS2068  in 
business  prompted  me  to  write, 

1 bought  my  TS2G68  computer,  2020 
cassette  recorder  and  2040  32  column 
printer  on  sale  more  than  2 years 
ago,  just  before  Timex  Corp,  gave  up 
on  computers.  1 had  planned  to  use 
the  computer  system  in  business,  as  I 
was  just  starting  out  as  a 
self-employed  bookkeeper  and 

freelance  writer.  During  the  past 
two  years,  I have  purchased  some 
business  software  and  replaced  the 
TS2040  witn  a full-size  80  column 
Panasonic  KXP-1091  Dot  Matrix  printer 
with  NLQ  mode,  using  an  Aerco 
interface,  I've  had  terrific  results 
using  the  computer  system  in  my 
freelance  writing  - the  NLQ 
manuscripts  look  very  professional 
and  there  are  some  very  good  word 
precessing  programs  available  for  the 
TS2U68,  I presently  use  the 

Textwriter  2000  Plus  Word  Processing 
program  but  I7ve  recently  purchased 
the  64  Column  MSCRIPT  and  hope  to 
master  the  use  of  it  soon.  I really 
haven't  had  any  trouble  saving 
manuscripts  on  cassette  tapes 
although  it  is  time-consuming 
compared  to  disks, 

1 wish  1 could  be  as  positive  about 
the  accounting  possibilities  on  the 
TS2068,  It  is  nearly  impossible  to 
find  any  integrated  accounting 
software  for  the  TS2U68,  and  the  main 
problem  I've  encountered  is  that  most 
of  the  business  accounting  software 
(Payroll,  AR,  AP,  Inventory)  that  is 


available  from  3rd  party  vendors  do 
not  support  full-sized  printers* 
They  are  onLy  compatible  with  the 
old  TS204U  thermal  printer.  The  same 
is  true  of  the  original  software 
produced  by  Timex  - I have  several 
programs  Budgeter,  VuCaLc,  Home 
Finance*  etc.*  that  I can't  get 
printouts  from  because  I've  retired 
the  TS2040,  This  is  very  frustrating 
and  could  be  another  reason  the  Timex 
failed  in  selling  enough  computers. 
It's  too  bad  that  when  the  T$2Q68's 
were  originally  developed*  they 
weren't  developed  with  the  disk 
drive*  80  column  printer  and 
appropriate  business  software 

compatiabi 1 i ty  . It's  almost  as  if 
the  computer  wasn't  really  regarded 
as  a serious  machine,  I like  using 
the  2068  but  to  add  a disk  drive  at 
this  stage  would  involve  a lot  of 
money  and  would  there  be  any 
software?  With  most  name  brand 
computer  prices  falling  fast,  buying 
a new  computer  system  with  disk 
drives  and  available  software  would 
probably  be  a better  choice.  I'd 
hate  to  give  up  my  TS2068  but  there 
doesn't  seem  to  be  many  alternatives. 
Anyway,  I haven't  been  able  to  use 
the  TS2Q68  very  successfully  for 
accounting  applications  and  so  1 use 
it  almost  exclusively  for  word 
processing.  It's  been  a relatively 
inexpensive  way  to  become  familiar 
with  word  processing. 

Basically*  I guess  I’m  biding  time 
until  and  if  3rd  party  vendors 
develop  more  accounting  software  or 
until  I can  afford  another  computer 
system,  1 guess  that  is  blasphemy  to 
all  dedicated  TS  users*  but  I'm 
getting  tired  of  hassles.  I'm 
Looking  toward  to  reading  other 
letters  from  TS  users  who  do  use  the 
TS2068  in  their  businesses.  If 
anyone  knows  of  any  compatible 
bussiness  software,  I'd  welcome  the 
information. 

Sincerely , 

Carolyn  Bower 
560  Catalina  Ave 
Wooster,  OH  44691 


Dear  QTS: 


Enclosed  find  a program  that  your  readers  with  disk  systems 
may  find  useful.  This  program  automatically  loads  your  program 
from  the  directory  listed  on  the  screen.  I am  using  the  AERCO 
disk  system,  but  the  variables  may  be  changed  to  work  with  other 
systems  that  list  the  directory  on  the  screen.  The  AERCO  system 
has  an  auto  boot  program  which  loads  this  program  as  soon  as  the 
computer  and  disk  drives  are  turned  on. 

Line  10  just  sets  up  the  colors 

Line  20  sets  the  variables  for  the  starting  position  of  the 
cursor. 

Line  30  loads  the  directory  and  jumps  to  line  50 
Line  40  loads  your  program  from  the  directory 

Line  50  to  Line  170  prints  and  moves  the  cursor  to  the  start  of 
each  listing 

Line  130  checks  for  the  ENTER  key  and  jumps  to  180  when  pressed 
Line  180  locates  the  first  space  after  the  first  quotation 
marks  in  line  40 

Line  190  to  Line  210  pokes  the  program  listing  pointed  to  by 
the  cursor  into  line  40,  using  CODE  SCREEN? 

Line  220  jumps  to  40  and  loads  your  program 

There  is  a maximum  of  14  characters  permitted  in  the  listing.  10 
for  the  program  name  and  4 for  the  period  and  type. 

This  program  will  continue  to  run  if  you  are  only  loading  bin 
type  programs,  but  is  lost  when  a basic  program  is  loaded.  The 
program  may  be  changed  in  any  way  after  line  40.  If  any  changes 
in  length  of  program  lines  are  made  before  40  you  must 
recalulate  the  offset  of  82  in  line  180. 

Sincerely, 

Lee  F reedline 
Homer  City,  PA 

10  BORDER  0:  PAPER  0:  INK  7 
20  LET  P-5 : LET  Q=0 
30  CAT  GO  TO  50 

40  CAT  " ", 

50  PRINT  AT  (P  + 1)  ,Qz w " 

60  PRINT  AT  (P-1) ,Q; w * 

70  FLASH  1:  PRINT  AT  P,Q?">W 
80  FLASH  0:  LET  A$=INKEY? 

90  IF  A$  = *5”  AND  Q=16  THEN  PRINT  AT  P,Q?"  LET  Q=Q:  GO  TO  50 
100  IF  A$-"6il  THEN  LET  P = P+1 
110  IF  A $ = "7"  THEN  LET  P=P-1 

120  IF  A$=*8"  THEN  PRINT  AT  P,Q;"  ■ : LET  Q=16:  GO  TO  50 

130  IF  A?=CHR$  13  THEN  GO  TO  180 

140  IF  P<5  THEN  LET  P=5 

150  IF  P>15  THEN  LET  P=15 

160  FOR  f=l  TO  5:  NEXT  f 

170  GO  TO  50 

180  LET  Z = (PEEK  23635+256*PEEK  23636) +82 

190  FOR  A=1  TO  14 

200  POKE  Z , CODE  SCREEN?  (P,Q+A) 

210  LET  Z=Z+1 : NEXT  A 
220  GO  TO  40 


MORE  ON  IS  DISK  DRIVES 
By  Chuck  Dawson 


Last  time*  I reviewed  the  Time^  of  Portugal  Disk  Drive  System 
for  the  TS-2068.  Now  that  I have  had  some  time  to  work  with  the 
system  and  try  it  with  several  programs.  I thought  an  update  of 
the  review  might  be  in  order.  My  overall  impression?  I love 
it.  Programs  load  in  a flash.  Sometimes  you  don  t even  get  to 
look  at  those  nice  "NOW  LOADING"  screens  long  enough  to  read 
them*  I have  a program  called  "ARTWORX"  that  takes  three 
minutes  and  thirty-five  seconds  to  load  from  tape.  From  disk, 
it  takes  22  seconds-  That  is  10  times  as  f a*t ? The  question  of 
which  programs  can  be  put  on  disk  is  oest  answered  this  way:  If 
you  can  make  a tape  backup  copy  of  the  program,  then  you  can 
transfer  it  to  disk*  You  have  to  give  a machine  code  portion  a 
name  because  when  the  basic  part  of  the  program  tries  to  load 
the  machine  code,  a LOAD  * ""  CODE  won't  work-  However,  a LOAD  * 
“name*1  CODE  will.  Other  than  that,  all  that  is  required  is  the 
addition  of  the  * after  LOAD  to  signify  that  the  computer  is  to 
look  on  disk  for  the  program  instead  of  on  tape, 

I had  quite  a bit  of  trouble  with  scrambled  files  and  bad  SAVES 
until  I figured  out  that  the  location  of  the  disk  right  under 
the  TV  was  at  fault*  It  seems  that  some  TVs  put  out  a fairly 
strong  signal  from  their  local  oscillator  or  power  supply  and 
these  signals  can  confuse  the  disk  controller.  Moving  the  disk 
system  to  a location  beside  the  TV  rather  than  right  under  it 
fi^ed  the  problem  and  I have  had  no  more  trouble.  I understand 
Zebra  Systems  is  including  with  each  purchase  instructions  as  to 
the  best  place  to  locate  the  drive. 

Also,  the  order  in  which  you  turn  on  the  equipment  is  important. 
Turn  on  the  disk  power  supply  first,  then  the  computer.  When 
done  the  other  way,  a power  spike  is  produced  which  could  knok 
out  the  2068,  If  you  just  want  to  use  the  computer  without  the 
drive,  you  can  leave  the  drive  off  and  turn  on  the  computer,  but 
I don't  think  many  people  will  want  to  operate  without  the  drive 
once  they  have  it. 

One  real l y nice  feature  of  The  Operating  System  <TOS>  is  the 
start  up  file  that  automatically  loads  and  runs  whenever  the 
2068  is  turned  on  or  reset  (yes  we  now  have  a reset  button),  I 
have  my  printer  driver  program  as  a start  up  file  on  disks  that 
make  use  of  the  printer.  For  instance,  one  disk  holds  a stock 
portfolio  program  which  allows  a printout  of  data.  For  the  full 
sized  printer  to  operate,  it  has  to  have  a driver  program 
installed.  So,  whenever  the  Stocks  disk  is  inserted  and  the 
system  reset,  the  driver  automat leal 1 y loads  with  no  effort  on 
my  part.  This  keeps  forgetful  people  like  me  from  adding  a lot 
of  new  data  to  the  program  only  to  find  out  it  carir.oi:  be  printed 
because  I forgot  to  load  the  driver. 

By  the  way,  this  is  the  type  of  program  where  tea  disk  system 
really  shines.  rtny  program  which  requires  data  to  be  adoe a a 
little  at  a time  over  a long  period  is  a pain  with  t^pe  necaus? 
the  new  ver  sion  has  to  De  resavea  eacn  update  session*  Nith  the 
disk  system,  -he  program  itself  can  give  the  command  at  the 
proper  time  and  the  save  tales  place  so  quickly,  one  hardly 
notices  e«ceot  for  rhe  low  hum  and  c 1 i c * of  the  drive*  Lile  I 
said,  I 1 nve  i ? . 


TIMEX  TIPS 
by  Chuck  Dawson 


QUESTION;  I understand  the  C-64  computer  has  a built*-in  clock 
that  can  be  set  by  PQKEing  in  half  a dozen  values  prior  to 
running  a program,  and  the  time  can  be  accessed  to  interrupt  a 
program.  Does  the  TS-2068  have  this  feature? 

ANSWER;  Yes,  and  you  only  have  to  POKE  three  values.  The 
"clock11  is  updated  60  times  each  second  at  location  23672.  When 
this  number  reaches  255  (about  four  and  a quarter  seconds),  it 
is  reset  to  zero  and  the  number  in  location  23673  is 
i ncr i mented.  When  it  reaches  255  (about  18  minutes),  it  is  set 
to  zero  and  the  number  in  location  23674  is  incrimented.  That 
gives  us  over  77  hours  before  the  clock  repeats*  The  easiest 
way  to  use  the  "clock"  is  to  POKE  the  three  locations  with  0 at 
the  beginning  of  your  program.  That  way,  you  start  at  a known 
value  of  zero. 

Now,  let's  say  you  want  the  program  to  loop  doing  some  task 
until  25  minutes  have  passed,  and  then  branch  to  an  alarm 
routine.  Somewhere  in  the  loop,  place  the  following  line; 

100  IF  PEEK  23672+256 +PEEK  23673+65536+PEEK  23674 >90000  THEN 
GOTO  3000 

The  number  90080  is  calculated  by  60*68x25,  Use  the  “>"  sign 
instead  of  equals  because  the  chances  of  the  program  calculating 
the  value  at  the  moment  it  is  exactly  equal  to  90000  is  pretty 
smal 1 . 

Another  variation  on  this  theme  might  be  a game  that 
several  people  play,  each  trying  to  beat  the  other's  best  time. 
Again  set  the  three  clock  locations  equal  to  zero  at  the 
beginning  of  the  game  and  then  at  the  end,  calculate  the  seconds 
used  by  the  following  line; 

1000  LET  SECONDS  = I NT ( (PEEK  23672+256+PEEK  23673+65536+PEEK 
23674)/ 68 > 

By  the  way,  the  "clock"  is  stopped  during  SAVE  and  LOAD. 


QUESTION;  I know  that  if  a number  is  calculated  and  the  result 
is  a whole  part  and  a line  of  digits  after  the  decimal,  I can 
strip  away  the  fractional  part  with  INT.  But  I want  whole 
numbers  and  two  digits  after  the  decimal  (like  dollars  and 
cents).  How  can  I do  this? 

ANSWER:  Easy1  Just  multiply  the  number  by  100,  take  the 

INTegar  part,  and  divide  the  answer  by  100.  Let's  say  the 
answer  to  your  calculation  is  contained  in  the  variable  A.  Just 
add  the  following  line  to  your  program  prior  to  printing; 

100  LET  A = .01+  I NT  < 1 00+A ) 

You  may  want  tn  round  the  answer  to  the  nearest  cent.  In  that 
case  the  line  would  look  like  this: 

100  LET  A = - 8) * INT ( . 5+1 08* A) 

I hope  this  helps.  Good  luck. 


TS206S  BASIC  TUTOR 
by  uarren  Fricfce 


Ue  starter  this  column  in  the 
Summer,  1935,  issue  wi th  an  art- 
icle on  the  use  of  the  function 
SCREENS  to  identify  a character 
in  the  print  POSITION,  and 
learned  that  SCREENS  mas  more 
or  less  Limited  in  such  use,  to 
those  characters  having  codes 
betuieen  32,  a space,  and  127, 
the  copyright  symbol-  SCREENS 
can  be  applied  to  other  charac- 
ters, and  even  to  graphic  sym- 
bols, but  its  response  is  not 
complete,  and  requires  that  me 
have  an  unde rs tending  of  its 
behavior  under  such  circum- 
stances, in  order  properly  to 
use  it.  Hence  there  mas  a short 
program  in  the  initial  article 
that  ail ome d us  to  INPUT  c h a r - 
acters  of  any  Kind  and  to  get  a 
printout  showing  horn  SCREENS 
considered  that  character.  The 
program  is  repeated  beiom  for 
your  convenience  along  mith  a 
printout  of  the  title  portion.. 


10  PRINT  “CHAR-  CODE  SCREEN* 
CODE  LEN  " 

20  PRINT  "ACTER  OF  IL,C) 

SCREEN*  SCR." 

30  PRINT  " CHAR. 

CL  , Cl  CL,  or* 

40  PRINT  

100  FOR  P=5  TO  21 
110  INPUT  a* 

120  PRINT  AT  n , 1; a*; TAB  7; CODE 
a*; TAB  15; SCREEN*  Cn , 1) ; TAB  22,  C 
ODE  SCREEN*  (n,l);TAB  30; LEN  SCR 
EEN*  fn  , 11 
130  NEXT  n 


CHAR-  CODE  SCREENS  CODE  LEN 
ACTER  OF  IL,C?  SCREENS  SCR. 

CHAR.  *L,CJ  <L,C) 


You  are  encouraged  to  try  vari- 
ous characters  in  this  routine, 
not  only  those  in  the  selected 
CODE  range,  but  inverses,  the 
chunKy  graphics  on  the  Keyboard 
and  UDG  characters,  both  those 
that  are  resident  in  the  UDG 
area  on  pomer-up,  and  some  that 
are  of  your  omn  POKEi ng , It  i s 
this  last  category  that  is  of 
particular  interest  to  us  today. 

If  you  tried  a UDG  of  your  omn 
POKEing,  you  mould  have  Learned 
that  CODE  SCREENS (L , C)  and  LEN 
SCREENS  i L , CJ  both  return  a 
value  of  zero.  This  means  that 
SCREENS  does  not  '■see"  a graph- 
ic character  at  all.  it  "sets" 
nothing,  not  even  an  empty 
space.;  because  a space  has  a 
CODE  of  32  and  a LENght  of  one. 

On  the  surface  this  information 
on  the  identification  of  a char- 
acter does  not  appear  useful. 

But  it  is;  because  in  all  other 
cases  CODE  SCREENS (L , C ) returns 
a value  greater  than  zero.  Let 
us  generate  a graphic  character 
and  put  this  property  to  a test. 

You  may, for  this  test,  use  a 
UDG  character  that  you  POKEd, 

If  you  POKEd  it  into  the  first 
available  position  in  the  UDG 
section,  it  can  be  referred  to, 
in  a program,  as  CHRs  144.  Or 
you  might  me  to  create  a 
graphic  character  in  a quicKer 
fashion,  and  identify  it  as  a*. 
For  example  ....... 


5 LET  a$=CHRS  35+CHRS  21+CHRS 
1 4 CHRS  0+CHA*  140 


There  are  other  and  shorter 
mays  to  write  this  line,  but 
the  CODE  numbers  help  to  ex- 
plain mhat  is  going  on  when  you 
RUN  it.  CHR*  35  is  the  ‘U1 
symbol.  CHRS  21  + CHR*  1 are 
equivalent  to  over  1,  and  chr*8 
says  to  bacK  space  the  charact- 
er that  follows.  CHR$  140  is 
one  of  the  chunKy  graphics.  Norn 
ENTER  ...  PR INT  a$.  HOW  do  you 
Li Ke  the  resu  It? 

You  can  get  all  sorts  of  un- 
usual symbols  with  this  line 
simply  by  changing  the  first 
and  last  terms  of  a*.  Bear  in 
mind  that  aS  is  a string,  and 
as  it  appears  above,  it  has  a 
CODE  Of  35,  for  the  first  char- 
acter in  the  string,  and  a 
LENght  of  5,  one  for  each  CHR* 
term,  you  can  verify  this  by 
ENTERing  PRINT  CODE  a*  and 
PRINT  LEN  a*.  But  SCREENS  does 
not  see  this  symbol  in  the  same 
may  and  returns  a zero  for  both 
CODE  and  LEN.  In  our  worK  me 
are  interested  only  in  how 
SCREEN*  sees  the  CODE  of  a 
character.  » 


now  we  are  ready  to  demonstrate 
this  use  of  SCREEN*  in  our 
usual  routine  of  FOUR -DIRECTION 
HOUEMENT . fldd  the  following 
lines  to  the  one  that  initiated 
a$ 


3 FOR  n =1  TO  35 

12  PRINT  AT  21*RND,31*RND, a* 
16  NEXT  n 

13 


20  LET  L -10 : LET  C = 15 

30  LET  LL=L:  LET  CC=C 

40  LET  L =L  + i INKEY  * = ' f 6 *'  AND  L<2 
1)  - i INKEY*  = M7,f  AND  L>0> 

50  LET  C=C+  t INKEY* ="8"  AND  C<3 
1) -(INKEY*="S"  AND  C>0) 

60  PRINT  AT  L,C; 

70  IF  CODE  SCREEN*  IL,C)=0  THE 
N BEEP  ,05,25 
30  PRINT  "B” 

90  PRINT  AT  LL,CC;“  “ AND  ILL< 
>L  OR  CC<  >C> 

100  GO  TO  30 


RUN  the  program  and  move  the 
puck,  an  inverse  asterisk,  about 
with  the  arrow  toys,  Uhenever 
the  puck  hits  a graphic  symbol, 
you  should  get  a confirming 
BEEP.  This  may  not  be  exciting, 
but  have  patience-  Ue  are  build 
ing  up  to  a more  involved  appli 
cation-  Line  70  asks  SCREEN* 
to  took  at  the  block  of  the 
screen  defined  by  L and  c and 
to  BEEP  if  the  CODE  of  the  char 
acter  there  is  zero-  The  only 
character  whose  CODE  is  zero  to 
SCREEN*  is  the  graphic  symbol. 

But,  suppose  we  have  a program 
in  mind  that  has  two  or  more 
graphic  symbols  for  SCREEN*  to 
examine-  ue  can  differentiate 
between  symbols  by  introducing 
another  condition,  say  COLOR. 
to  demonstrate  this,  return  to 
the  preceding  routine  and 
change  line  12  to  read 


Don't  run  away!  All  this  change 
does  is  to  add  magenta  color  to 
about  half  of  the  target  sym- 
bols that  will  print  on  the 
screen-  The  others  will  be  in 
black  ink  as  before.  Now  the 
ATTRibutes  of  the  symbols  have 
different  values.  The  black 
ones  have  an  ATTRibute  value  of 
56,  which  is  the  normal  or  de- 
fault value,  and  the  magenta 
ones  have  an  ATTRibute  value  of 
59,  ATTRibutes  were  discussed 
at  tenghta  in  the  Fall,  1905, 
issue  of  OuarTerS. 

Now  replace  line  70  wi th  the 
following  two  lines  that  take 
ATTRibutes  into  consideration.. 


75  IF  CODE  SCREEN*  CL, 0=0  AND 
ATTR  (L,0=56  THEN  BEEP  .05,25 

76  IF  CODE  SCREEN*  (L,O=0  AND 
ATTR  <L,C)=59  THEN  BEEP  .05,10 


RUN  the  program  again.  Now  when 
the  puck  strikes  a black  symbol 
it  will  BEEP  in  a higher  pitch 
than  when  it  strikes  a magenta 
one.  Thus  we  can  di f f e ren t i a te 
between  them. 

In  future  articles  there  will 
be  a series  of  short  game  pro- 
grams that  will  further  illus- 
trate these  concepts.  For  the 
most  part,  they  wilt  be  bare- 
bones  programs  that  you  can 
modify  and  embellish  to  suit 
yourse  l f . 


12  PRINT  INK  3 RND  RND  > . 5; RT  £ 
1*RND,31*RND; 3* 


REVIEW:  Zebra  OS-64  Sixty-Four  Column  Cartridge 
by  Chuck  Dawson 

You  may  have  read  in  the  TS-2060  manual  about  the  64  column 
capability  of  the  computer  but  never  got  it  to  work-  Welcome  to 
the  club!  Until  now,  with  the  possible  exception  of  the  MSCRIPT 
word  processing  program,  no  one  could  get  it  to  work  properly. 
Now,  Zebra  Systems  of  Woodhaven,  New  York,  has  introduced  the 
□S-64-  It  is  a cartridge  that  fits  inside  that  little  door  on 
the  2868,  When  you  power  up,  there  it  is!  It  is  that  easy.  You 
can  PRINT  AT;  TAB;  LPRINT;  and  LLIST  in  64  columns.  LPRINT  and 
LLIST  go  to  a full  sized  80  column  printer.  The  interface 
driver  is  built  in-  COPY  will  work  if  you  have  an  EPSON  (or 
compatable)  printer. 

The  limitations  are  not  those  of  the  cartridge  but  of  the 
computer  s built  in  operating  system.  When  64  columns  are  in 
use,  you  can  have  only  one  paper  col  or  and  the  border  will 
match-  No  local  color  assignments  are  allowed-  The  whole 
screen  will  be  one  paper  color  and  one  ink  color.  The  ink  is 
automatically  chosen  by  the  system.  Blue  paper  gives  you  yellow 
ink.  White  paper  gives  black  ink.  The  combinations  are  fixed. 
This  has  consequences  you  might  not  think  of  right  off  hand. 
For  instance,  when  LOADing,  you  don't  get  that  striped  border  to 
show  how  things  are  going.  The  picture  just  sits  there  with  no 
indication  that  anything  is  happening.  I hope  you  have  a VU 
needle  or  a light  on  your  recorder  to  tell  you  when  to  shut  the 
thing  off*  Also,  the  memory  map  is  changed-  That  means  that  many 
programs  will  not  work  without  modification.  Most  machine  code 
is  placed  high  in  memory  to  keep  it  out  of  the  way,  but  with 
64-coiumn  in  place,  this  area  is  used  for  stacks  and  system 
variables  that  will  cause  a crash  when  overwritten.  I tried  it 
with  Smart  Term  II  hoping  to  get  a 64  column  display  when 
receiving  text  via  the  modem,  but  it  didn't  work.  Some  Smart 
Alec  will  probably  rewrite  it  and  make  it  work  but  it  won't  be 


Strangely  enough,  PLOT,  DRAW,  and  CIRCLE  work  as  they  do  in  32 
column  with  x in  the  range  of  0-255  and  y in  the  range  of  0-175. 
It  has  been  well  written  and  so  far  the  only  bug  I have  found  is 
the  inability  to  supress  a line  feed  which  is  sent  along  with 
the  carriage  return  during  COPY-  I had  to  change  the  switch  in 
my  printer  to  get  a proper  COPY.  They  did  provide  a way  to 
center  the  COPY  on  the  paper  so  I guess  we  came  out  even  on  that 
one.  They  mention  in  the  instructions  that  you  will  probably 
want  to  use  a monitor  instead  of  a TV.  Well,  Z use  a TV  and  I 
think  the  quality  of  the  display  is  very  acceptable.  So,  in 
summary,  for  many  applications  (where  color  is  not  important  but 
lots  of  text  is)  this  cartridge  is  just  what  we  have  been 
waiting  for* 


T.O.S.  DISK  DRIVE  " START ,f  PROGRAM 
by  Chuck  Dawson 


If  you  own  a Timex  of  Portugal  Disk  Drive  system  (also  called 
the  Zebra  FDD  system),  you  may  have  noticed  in  the  instruction 
book  that  any  program  named  4iSTART"  will  automat ical  1 y LOAD  and 
RUN  when  the  system  is  first  powered  up  or  the  RESET  button  is 
pushed.  That  seems  like  a good  feature  but  brings  up  the 
question:  What  program  should  I name  START  and  what  should  it 
do? 

Here  is  one  possible  solution:  Use  the  program  to  CATalog  what 
is  on  the  disk  and  provide  a quick  and  easy  way  to  choose  and 
LOAD  a program  or  file.  The  program  that  I came  up  with  is  shown 
on  the  newt  page.  The  screen  display  is  shown  at  the  bottom.  The 
CATalog  command  is  used  to  create  the  name,  type,  and  size  of 
each  file  on  the  disk.  The  "cursor ■*  is  the  inverse  chevron 
pointing  to  "BYTE" * It  responds  to  shift  6 (the  down  arrow)  and 
shift  7 (the  up  arrow).  Pressing  ENTER  will  LOAD  the  file  next 
to  the  cursor.  You  don't  have  to  type  out  the  name  or  remember 
to  add  the  or  anything.  In  order  for  this  scheme  to  work, 
the  program  must  be  able  to  tell  the  difference  between  a BASIC 
program,  a machine  code  file,  a SCREENS,  and  so  forth.  This  is 
done  by  the  suffix  following  the  name.  My  system  i s to  have  all 
BASIC  programs  with  no  suffex  or  to  use  ".BAS"  after  the  name.  A 
machine  code  name  is  always  followed  by  11  .MC“.  A screen  string 
is  always  followed  by  ".SCR”*  You  can  make  up  your  own  system  as 
long  as  you  are  const  slant. 

The  way  this  all  comes  together  is  that  the  name  of  the  file 
next  to  the  cursor  is  stored  in  A*.  The  suffix,  if  any,  is 
stored  in  B$.  Lines  180  to  210  place  CODE,  SCREEN*,  or  whatever 
is  needed  behind  the  LOAD  command  and  the  file  is  LOADed . If 
you  stop  the  cursor  next  to  the  name  of  a DIRectory  (the  bottom 
name  in  the  example) , the  program  does  a GOTO  * "DIRECTORY”  and 
starts  over,  listing  the  programs  in  that  directory.  Modify  the 
program  to  fit  your  own  files  and  suffix  system.  It  needs  to  be 
SAVEd  on  each  side  of  each  disk.  Then  when  you  power  up  or 
press  the  RESET  button,  you  automat i cal  1 y get  a list  of  what  is 
on  that  disk  and  by  moving  the  cursor,  you  can  quickly  LOAD  the 
chosen  file. 


THEN  PRINT  AT  CURSOR, 8 
THEN  PRINT  AT  CURSOR, 8; 


18  REM  SAVE  *" START"  LINE  18 
20  OVER  8:  CLS 
38  LET  CURSOR=7 
40  PRINT  AT  1,0} 

50  CAT  * 

60  PRINT  AT  CURSOR, 8} 

70  IF  INKEY*=CHR*  10  AND  SCREEN*  (CURSOR* 1 ,0>< >" 

LET  CURSOR=CURSOR+ 1 — ( CURSOR-20 ) 

80  IF  INKEY*=CHR*  11  AND  SCREEN*  (CURSOR-1 ,8) =" 

LET  CURSOR= CURSOR— 1 + (CURSOR9 1 ) 

90  IF  INKEY*=CHR*  13  THEN  GO  TO  110 
100  GO  TO  60 

110  LET  A*=‘"'i  FOR  1=0  TO  7 

120  IF  SCREEN*  (CURSOR, I >< >"  " THEN  LET  A*=A*+SCREEN*  (CURSOR, I ) 
130  NEXT  1 

140  LET  FOR  1=9  TO  11 

150  LET  B*=B*+SCREEN*  (CURSOR, I) 

160  NEXT  I 

170  IF  B*="DIR"  THEN  GO  TO  *A*i  GO  TO  10 

180  IF  B*="MC  " THEN  LET  A*=A*+".MC":  LOAD  *A*COD£  s STOP 

190  IF  B*="  " THEN  LOAD  *A* 

200  IF  B*=" SCR " THEN  LET  A*=A*+" . SCR" ! LOAD  *A* SCREEN*  : STOP 

210  LET  A*=A*+". "+B*i  LOAD  *A* 


Name 

Typ 

Size  fl  L 

l c 

DISRSSY 

9388 

10  K 

MOUER 

14-81 

2K 

H -SCROLL 

SCI 

IK 

ZEBRRREM 

397 

IK 

RENUMBER 

553 

IK 

BYTE 

1527 

2K 

TEST 

354- 

IK 

ZEUS 

MC 

7941 

8K 

BACKUP 

1496 

2K 

LOSYS 

1501 

2K 

DUMP 

MC 

4 73 

IK 

SEN DURRS 

1105 

2K 

RENUMBER 

MC 

36 

IK 

DUMP 

835 

1 K 

O -SORT 

1201 

2K 

RELOC-DR 

MC 

80S 

IK 

SORTFILE 

904 

IK 

TAPE 

DIR 

5469 

3K 

M ax  14-  0 K 

Cu  r 

49K  Rem 

9 IK 

P 


P 

P 

P 

P 

P 

P 

P 

P 

P 

P 

P 

P 

P 

P 

P 


Input  of  Default  Values  in  Interactive  Programs. 

■ II  m m II  m II  m • n n « n It  ft  n II  tr  H h n ir  n II  II  *»  II  h * II  II  U u I|  M It  II  * H h * H II  n H M ft  U H « h H * N 

Heinz  H.  G R 0 T E 


In  many  interactive  programs  there  are  values  that  are- 
generally  constant,  but  shall  easily  be  changeable,  if  desired. 
On  the  other  hand  it  is  too  troublesome  to  insert  them  each  run. 

formally  the  requested  value  of  a variable  is  typed- in, 
end i ng  with  an  ENTER,  For  default  values  it  is  desirable,  to 
hit  only  the  ENTER  button  to  indicate  that  the  programmed 
default  value  shall  be  used.  If  a different  value  is  desired, 
this  leaves  the  option  of  inserting  it  before  typing  ENTER. 

Since  in  the  BASIC  language  characters  and  numbers  are 
stored  differently,  a method  of  conversion  has  to  be  used  when 
numbers  are  entered,  since  ENTER  is  a character. 

If  letters  are  entered,  no  conversion  is  needed,  since 
letters  are  characters. 

But  there  is  no  built-in  conversion  from  characters  to 
numbers.  The  number  has  to  be  entered  as  a character  string;  and 
then  each  character  has  to  be  converted  with  the  proper  weight. 

This  conversion  is  done  by  the  subroutine  starting  at  200. 
The  program  from  100  to  150  is  used  for  testing  the  subroutine. 

Positive  and  negative  numbers  with  a total  of  9 characters 
(digits  plus  decimal  point  plus  minus  sign!  can  be  used.  This 
number  can  be  adjusted  by  changing  the  dimension  and  the  initial 
value  of  I, 

The  program  was  developed  on  the  2068.  Because  the 
characters  in  the  T/S  1000  are  arranged  differently  and  no 
multiple  statements  are  allowed,  the  program  had  to  be  changed 
slightly.  Both  versions  were  tested  on  the  pertinent  computer. 

If  the  default  values  are  nonzero,  the  previous  program  is 
not  needed  if  the  following  method  is  used  with  the 
disadvantage,  that  it  is  operationally  more  complicated. 

If  a default  value  is  desired,  a zero  is  inputted  followed 
by  ENTER.  The  program  branches  then  accordingly. 


CONTINUED 


TS2G68 


Din  !*($& 

L ET  PFit7i2.36 

INPUT  "yflL'.c  ■? 
- -1* 


tfg 

-iff: , 

lip  So  sue  £00 

IIS  LET  XY2=INRj 
150  GO  TO  120 
£00  LET  1=10  LET  F*CT=i 
NPU  =0 : LET  SIGN=1 

210  IF  < >» 

0 


C DEFAULT 


PRINT  XYZ 


LET  I 


THEN  GO  TO  23 


220  LET  INPU  =DFLT ■ RETURN 
230  IF  ltd:**"*"  THEN  LET  5IGN  = 
-1  . 


24-0  IF  IS  I “ " THEN  GO  TO  26 

0 

250  LET  1=1-^:  GO  TO  24-0 

260  IF  then  GO  TO  29 

0 

£70  LET  INPU = INF U /FACT  IF  I=£ 
RND  SIGNs— 1 THEN  GO  TC  330 
280  LET  1=1-1  LE^  FACT=1  GO  T 

0 340 

290  LET  INPUsINPU+FflCT#(CODE  1$ 
Cl) -48) 

300  lET  1 = 1-1  LET  FACT  =10*FACT 
310  IF  SIGN  = 1 THEN  GO  TO  340 
320  IF  I>1  THEN  GO  TO  240 
330  LET  INPU*- INPU:  RETURN 
340  IF  I < 1 THEN  RETURN 
350  GO  TO  £40 


OTHER  METHOD 


100  INPUT  ' Jf. uUm  7 (. DEFftUL 

T = 12 . 36)  , X 

110  IF  X < >0  THEN  GO  TO  130 
1£0  LET  =12,36 
130  REM  CONTINUE 


TS1000 

100  DIM  I$fj  ; 

110  LET  DFLT  = 12-36 

PRINT  AT  21,0; "VALUE  ? 
(DEFAULT =12 . 36) " 

125  INPUT  I* 

130  GOSUE  200 
14-0  LET  XYZ=INPU 
14-2  CL5 

144.  PRINT  AT  0,0;  XYZ 
150  GOTO  120 
200  LET  1=10 
202  LET  FACT*! 

204  LET  INPU=0 
206  LET  SIGN=1 

SIS  £I>  < >"  then  GOTO  230 

220  LET  INPU=DFLT 
225  RETURN 

_“30  IF  IS  (1)  =••-••  THEN  LET  5IGN  = 

Is!  LETII-I-I>"  ’’  ™EN  S0T0  2SC 
255  GOTO  240  * 

?SS  ?£  *S’:I><>  THEN  GOTO  290 

270  LET  INPU = INPU /FACT 

2T5  IF  1=2  AND  5 IGN =- 1 THEN  GOT 

U 330 

280  LET  I=l_l 
282  LET  FACT =1 
284  GOTO  340 

2?0  LET  INPU =INPU+FACT* (CODE  IS 

i I J -£9 J 

300  LET  1=1-1 

305  LET  FRCT=10*FRCT 

310  IF  S IGN  = 1 THEN  GOTO  340 

3£0  IF  1:1  THEN  GOTO  240 

330  LET  INPU  = - INPU 

335  RETURN 

340  IF  J<1  THEN  RETURN 
350  GOTO  £40 


Something  strange  about  " V A L * 

Heinz  H.  Grote 

If  you  look  at  the  program  below,  you  are  inclined  to  doubt 
the  good  judgement  of  the  author,  putting  "VAL"  all  over.  But 
when  you  program  it  and  compare  it  with  the  way,  it  is  normally 
written,  you  find  that  it  uses  14  BASIC  bytes  C 12  % ) less  than 
the  conventional  program  with  139  bytes. 

This  is  a consequence  of  the  way  in  which  numbers  are  pro 
grammed  by  the  T/S  computers.  In  order  to  save  execution  time, 
the  BASIC  program  contains  both,  the  original  number  and  the 
normalized  floating  point  equivalent.  If  you  use  the  UAL- 
f unction,  this  is  not  the  case.  You  add  the  3 codes  for  UAL  and 
2 quotation  marks  but  you  gain  6 code  bytes,  tone  for  the  number 
indicator,  and  five  for  the  normalized  floating  point  number  ). 

While  the  running  time  for  the  standard  program  is  5 
seconds,  the  one  with  the  UAL  requires  13  seconds. 

This  example  shows,  that  in  order  to  save  14  memory  spaces 
< 12  % > you  sacrifice  8 seconds  ( 160  % ) execution  time. 


LET  h =URL  “2,5" 

£10  FOR  I=UflL  "1“  TO  URL  “255 
£20  IF  I : URL  “200  “ THEN  GO  TO 
RL  250 14 

230  LET  R=R-I/URL  2,T 
£40  GO  TO  URL  £60“ 

. £50  LET  A =R 4l  + URL  1,5“ 

250  NEXT  I 
£70  PRINT  A 


£00  LET  R =£ , 5 

£10  FOR  1=1  TO  255 

220  IF  I 200  THEN  GO  TO  250 

£30  LET  R=A-I/2 

£40  GO  TO  £60 

250  LET  R=R-J+i.5 

£60  N£>“  I 
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Do  you  find  yourself  looking  for  good,  solid  Information  for  your  Timex  Sinclair 
computer?  Do  you  want  to  know  what  makes  It  tick?  Are  you  looking  for  new  software, 
books,  hardware  or  better  yet,  slicker  ways  to  do  your  own  programming?  A YES  answer 
to  any  of  these  questions  is  reason  enough  to  subscribe  to  the  SyncWare  News.  SWN  Is 
not  a newsletter,  but  It  Is  a journal  for  your  machine.  We  try  to  explain  the  logic 
behind  algorithms  and  not  just  give  a program  listing.  We  have  advanced  and  beginning 
tutor  lab  in  a variety  or  areas.  Our  format  Is  changing  and  upgrading,  to  provide 
easier,  more  appealing  reading  for  everyone.  If  you're  wary  of  wasting  your  money, 

*3.00  will  bring  a sample  Issue  for  your  perusal.  We  at  SWN  like  our  new  direction, 
and  we  are  sure  that  you1 11  agree. 

Do  you  have  a program  or  product  for  sale?  Would  you  like  to  tell  others  about  a 
service  that  you  can  perform?  Drop  us  a line  and  we  will  tell  others. 

Subscribe ! 1 year  (6  issues)  $ 16.95 
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